AddHatch
Description
This method adds the HATCH entity.
The instance of the TdxfExportData type is a parameter of the AddHatch, AddHatchEx procedures. It contains following fields:
| Parameter | Type | Description |
|---|---|---|
Data | TdxfExportData | The instance of the TdxfExportData type is a parameter of the AddHatch and AddHatchEx procedures. The Points field contains a list of hatch boundaries. Each boundary is a set of points. The Count field defines quantity of boundaries. The Style field defines style of the hatch. The Flags field defines is the hatch line solid? Solid fill: Flags = 1; pattern fill: Flags = 0. |
APatternName | String | The hatch pattern name. |
AIslandDetectionStyle | TsgHatchIslandDetectionStyle | The hatch area. |
APatternType | TsgHatchPatternType | The hatch pattern type. |
There are several hatch styles.
| Hatch style | Hatch pattern name |
|---|---|
| hsHorizontal, hsVertical | LINE |
| hsFDiagonal, hsBDiagonal | ANSI31 |
| hsCross | NET |
| hsDiagCross | ANSI37 |
There are several hatch areas types.
| TsgHatchIslandDetectionStyle | Description |
|---|---|
| hidsNormal | Hatch "odd parity" area |
| hidsOuter | Hatch outermost area only |
| hidsIgnore | Hatch through entire area |
There are several hatch pattern types.
| TsgHatchPatternType | Description |
|---|---|
| hptUserDefined | User-defined |
| hptPredefined | Predefined |
| hptCustom | Custom |
Syntax
procedure AddHatch(var Data: TdxfExportData);
procedure AddHatchEx(var Data: TdxfExportData; APatternData: TList; APatternName: string; AIslandDetectionStyle: TsgHatchIslandDetectionStyle; APatternType: TsgHatchPatternType);